Public Class LabelBox
    Inherits Label

    Public Sub New()
        Me.BorderStyle = Windows.Forms.BorderStyle.FixedSingle
        Me.BackColor = Color.CornflowerBlue
        Me.ForeColor = Color.White
        'Me.Font = New Font(Me.Font, FontStyle.Bold)
        Me.Cursor = Cursors.Hand
        Me.Height = 16
        'Me.ReadOnly = True

    End Sub
    'Public Sub _Click()
    '    MsgBox(AgendaBox.t)
    'End Sub

End Class
